BBBBB 



sides *No- of cylindersV0n decimal) rlnterleave value: On decimal) @FREE Syntax: 
Free Jdevname] Usage : Displays number of Tree sectors on a device @GFX 



Syntax: RUN GI 
BASIC09 to do c 
GDQQpathHunct 
handle enhanced 
Usage : Graphics 
windowing comrn 
help to users will 
<5>IDENT Syntax: 
from OS-9 memoi 
single line output 
directory <s>INIZ Syn 
@EMKEY Syntax: R 
input a s! 
the proc 
memory 
text files 
memory 
directory 
module ( 
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ce package for 
Syntax: RUN 

BASIC09 to 
Syntax: none 
die graphics/ 
: Give on-line 
of help topics 

information 
mory -s « use 

at execution 

ch a device 

subroutine to 

[abort to 
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SUPPORT 
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<s>MODR 

memory 

compare 

to module 

module M * ___ 

Usage : Set mj~ Addresses for Correspondence 

monochrome rr Fdnorial Ma te ri al; 
and links an CC __ 

Procs [e] Usag< Gordon Bentzen 

display all pro 8 ° din Street 

current date d SUNNYBANK O l d 4109 

execution direct Subscriptions & Library Requests ; 
Usage : Gives 1| Jean-Pierre Jacquet 




module> Usag( 
[yy/mm/dd/hh:r 
Syntax: Setpr <j 
num @>SHELL 



@TMODE Syntax; 



27 Hampton Street 
DURACK Old 4077 




^Montype [opt] 
monitor m « 
:e : Creates 
Syntax: 
Opts : e = 
Prints the 
he current 
filename> 
mb <i-code 
;ax: Setime 
@SETPR 
process to 
interpreter 
or changes 




tne ope 

[value] 
<modna 
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creatcTCI 
Initialize anffffl^ | 

from stdin -s«type * set screen type for a window on a new screen @XMQDE f 
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This edition of our newsletter brings us close 
to the end of the third year of production froe 
sunny Queensland. Cur next (August) edition 
will complete the three years, and it is now 
tise to start thinking of the new subscription 
year. 

Meabers wishing to re-subscribe will need to do 
so before the end of August, ye tri 1 1 aaintain 
the saee subscription rate of $18.88 for the 
cosing year. That's no increase for four 
years!! How is that? This has been tade 
possible by the nunber of $2 copy fees received 
for public tioaain material. 

Current aesbership is 63 and we suspect that 
soae of you will not wish to renew as you have 
fioved to soae other computer type and operating 
systea. However, ve will require a Einisua of 
28 aeabers to sake it worthwhile continuinq. 



is available on CoCo 039 foraat floppy and Atari 
3.5 fonat. 

Both versions of UGCAT are coaplete with the 
6asic89 (CoCo QSS) or Basic (DSK) "Lookup" 
prograaae by Bob Devries. Please send requests 
to our Librarian toaether with fornatted disk, 
return postage and $2 copy fee. 

The P.O. library as it stands is in B ar a 

archives and coaprises eleven 88 track D.S. 
(728k) disks. 



IN THIS EDITION 

A Basic89 Tutorial by Bob Devries - Part 2 

B C B Tutorial - Continued. 

FREE - A version bv Hark Griffith - Part 2 



Soae of you have joined the 059 Userqroup only 
recently and we should have supplied you with 
back issues free Septeaber 1998, I have siipoed 
up Bore than once in this regard, so if we still 
owe you any back issues, please drop ae a line 
and I will correct the situation. Any new- 
subscribers fro* now on will be treated as 
aethers for the year coaaencing Septesber 1991 
and will be added to the sailing list 
iaaediately. This say aean one or two free 
issues, but it is just too difficult to aaintain 
an endless supply of back issues. Back issues 
will now onlv be available as disk files. 



ye also have an update to the Newsletter 
CONTENTS listing. This is very handy if you are 
looking for a previous article. 

ye are iost grateful to those aeabers who have 
contributed articles for publication in these 
pages and encourage all aeabers to "have a go" 
regardless of your experience level. Soie newer 
Usergroup aeabers are just starting the 0S9 
experience and will need soae help. I aa sure 
that iany of us could tell a long story about 
our early frustrations and exoeriences, so how 
about a few tips for those new users. 



ft sesbership application/renewal 
included with this newsletter. 



tors 



15 



PUBLIC DOKAIN LIBRARY 

Just a reainder that we have a database of the 

P.O. library. USCAT (User6roup Catalogue) which 



I have received a few queries f roe aembers in 
trouble with so&e applications which have not 
yet been answered. Please be patient, we will 
get there. 

Cheers, Gordon. 



ooooooooooOOOQOOQQGDoooooooooo 
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ft 6as:c65 Tutorial 
bv Bod Oevries 



Here is the SA3IC code for ths nusbersquare 
prograase froa 'Hicrocoiputing', June 1381. It 
is written in vanilla BASIC, but is suitable for 
Extended Colour Basic with minor socifications. 
in lines 140,456, 766, 32$, 366 and 1456. Can 
you work out what to change? (Note please that a 
colon is used instead of a REM) 

6816 : Nusber square gaae 

6626 : ver 4.6 - 12 nov 73 

6636 : Hare I. Leavey, H.D. 

6646 LINE= 6 

6656 DISITS= 6 

6666 PRINT "NUMBER SQUARE S« 

6676 PRINT ■ * 

6686 PRINT 

6636 PRINT WELCOME TG THE WORLD 0F S 

6166 PRINT "CONFUSION. THERE ARE TW0 C 

6116 PRINT "VERSIONS OF NUHBER SQUARES:" 

6126 PRINT ■ I - SEQUENTIAL 8 

6136 PRINT s 2 - MAGIC SQUARE" 

6146 INPUT "yHICH IS YGUR PLEASURE 5 ,T 

6156 IF T=l SOTO 316 

61S6 IF T02 GOTO 146 

6176 : 

6186 : SET UP HAGIC 

6136 : SQUARE BOARD 

6266 : 

6216 FOR 1=1 TO 4 

6226 FOR J=l TO 4 

6236 READ MCI, J ) 

6246 LET Bil, J)=H(I,J) 

6256 NEXT J 

6266 NEXT I 

6276 DATA 1,8, 

6286 LET 11=4 

0236 LET J] =2 

6366 GOTO 446 

6316 : 

6326 : SET UP SEQUENTIAL 

6336 : BOARD 

6349 ; 

6356 DIN 6(4,4) 

6366 FOR 1=1 TO 4 

6376 FOR J=l TO 4 

6336 LET B(I,J)=CI-l)i4+J 

6336 NEXT J 

6466 NEXT I 

6416 LET 11=4 

6426 LET J! =4 

6i36 



2,5,16,13,4,3,7,16,9,14 






yyn HUNDRED HUES 



6476 PRINT H I AM NOU SCRAMBLING THE BOARD.. 

6486 FOR Q=l TO 296 

6436 LET !1=INT(l+RNDi4) 

6566 ON H GOTO 516,566,616,666 

6516 IF 11=1 GOTO 436 

6526 LET BUI ,JU=BUH ,J1) 

6536 LET B(I1-1 ,J1)=16 

6546 LET 11=11-1 

6556 GOTO 766 

6566 IF 11=4 GOTO 436 

6576 LET Bill ,J1)=B(IH! ,J1 ) 

6536 LET BCI1+1 ,JI)=16 

6556 LET 11=11+1 

6666 GOTO 766 

6616 IF Jl=l GOTO 456 

6626 LET BCI1 J\ )=B(I! , J1-! ) 

6636 LET Bill ,JH )=lb 

6646 LET J1=JH 

6656 GOTO 766 

6666 IF Jl=4 GOTO 436 

6676 LET BCI 1 ,JI >=B£ 1 1 , Jl + i) 

6636 LET SCI1 , Jl+1 >=16 

6636 LET JW1+1 

6766 NEXT Q 

6716 : 

6726 : PRINT BQARO 

6736 : 

6746 LET K3=6 

6756 : OUTPUT A s H0ME UP S 

6766 PRINT CHRfflG): 

6776 PRINT " " 

6786 FOR 1=1 TO 4 

6756 FOR J=l TO 4 

6866 PRINT"; fi ; 

6316 IF Bii r J)=16 PRINT B S ;:60T0 846 

6326 IF BCI,J)<i6 PRINT B B ; 

6836 PRINT Bil, J): 

6846 NEXT J 

6856 PRINT B ; G 

6366 PRINT " ■ 

6876 NEXT I 

6886 : 

6836 : ERASE REST OF SCREEN AND 

6366 ; BEEP FOR INPUT 

6916 : 

6326 PRINT CHR$(22);CHR*(7);CHR*(7); 

6336 ; 

6346 : INPUT HOVE 

6556 : 

6366 INPUT 3 MDVE yRICH PIECE" ,K 



WW -i^' 



Jul V 



AUSTRALIAN OSS NEWSLETTER 



ieie next j 

1920 NEXT I 

lese if i i=e then print h i cant find that 

NUHBER B :GOTG 940 
1648 LET I2=6;J2=e 

iese for i = r i — i tg im 

lese if i>4 sdto iese 

1676 IF I<! GOTO iO30 

lese IF B(I ; Ji)=!b THEN I2=I:J2=J1:G0T0 H70 

1*90 NEXT I 

1 1 6C FOR J=JW TO Ji + 1 

me if j>4 goto 1140 
1120 if j<i goto me 

1 1 3e IF B(H,J)=1S ~$tM 12=11 :J2=J: GOTO 1179 
1140 NEXT J 

11 be PRINT G N0T A VALID HQVE B :60TG 940 
] 1 7fc? LET B (12, J2>=!^ 
Urn LET B{iLJ])=iG 
1190 ON T GOTO 1210.1320 

1210 ; SEQUENTIAL SOLUTION 

1220 : 

123^ LET C = 

1240 FOR I = i TD 4 

1250 FOR J=i TD 4 

I2b0 Iy Bu,JXC GOTO 720 

]27« LET C=B(I .J) 

1280 NEXT J 

]290 NEXT I 

1300 PRINT S YGU SOT IT!" 

13(0 GOTO 145* 

1 320 l 

1330 ; MAGIC SQUARE SGLUTIQK 

1340 ; CHECK 

1350 : 

13b0 FOR 1=] TO 4 

1370 FOR J=: TO 4 

1380 IF B(I,JK>ri(L J) SOTO 720 

1 390 NEXT J 

Mm NEXT I 

1410 : 

142£ ' A vi'IN IS DECLARED 5 

1430 : 

U40 PRIN" "THAT IS THE CORRECT SOLUTION!" 

14Se INPUT ^LIKE TO PLAY ANOTHER SAHEMf 

1460 IF LEFTsCI*,i)= B Y B THEN RUN 

1470 END 

"he gariit is a fairly sifipie one based on the use 
of fiuili-diraerisionsd arrays. Note tne i* ! se of 
colons it the b^inninc of REM Iir:e c t-hich is 
also ocssibie in 0EC8. Now coses the tricky 

DSP* the CCHV^^S I:" il tO BssicOS ^"r'jv I'll 

snot' vj : j t He ccG 11 a = * "eurote i* tn^. " -ill 



FKU f Jtui'Kt njEbersqjare 

i.i version a.O - 12 NOV 79 

(i safe I. Leavey, rlD 

it BasicOS version By Bob Devnes April 91 

OIK t : INTEGER 

DIM i J: INTEGER 

Qlii b(4 , 4 ; : INTEGER 

01* i 1 _ r j I : INTEGER 

Qltf q.srijffiS,: : INTEGER 

Dlr P!fi(4 ; 4); INTEGER 

DIM iop:B00LEAN 

DIM valiriiSOOLEAN 

DIrl soiijtiQn;800LEAN 

DIri nevgaEie; BOOLEAN 

SHELL E t£oae -pause" 

nesgaiss = TRUE 

UKILE nesgaiBe=TRO'E 00 

PRINT CHR$(!2): 

PPTftFT B rj ii ¥ P; ? w ■-. fj i: c 5 f o t B 
PRINT *' c 

PRINT 

PRIN" H yekOEe to the world of* 

PRINT Confusion. Tnere are two" 

F'KlNi "vsr^i^n^ of nusbe^ SQuar^s! 11 

PRINT s 1 - sequential" 

PRINT B 2 - Magic Square" 

INPUT "Which is ycLir pleasure '': c : t 

I" t=l THEN 

l i V ! 1 _■ _ V U ' r ■ ^ _• I.- 1 !_■ . i : , j i .' 

ELSE 

RUN ssiupiasbCb.sis.ilj!) 

PRINT ff I aj; no* scrambling tne board... 5 

FOR o = l TD 200 

i cd=FAL£E 

WHILE Icd = FALSE 00 

&=i+RN0(3) 

IF 8=1 THEN 

IF IK): THEN 

bill Jn=b(il-: JU 



]qq= ; U; 


t- 


ENOIF 




ENDIF 




IF k~2 


THEN 


" P i ; '" 


..* JhC|« 



biiH!..ji !=!b 






^r !t ^ 
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b(il ] il-])=1b 
Ji=jH 

iop=TRUE 

END IF 

ENDIF 

IF a=4 THEN 

IF jl<>4 THEN 

b(i],jl)=b(il,j!+!) 

b(il,ji+l)=16 

il=jt+I 

iop=TRUE 

ENDIF 

ENDIF 

ENDtfHILE 

NEXT q 

it print board line 726 

5clution=FALSE 

REPEAT 

RUN qfx2i E cwarea\2S ; i2. 22,12) 
PRINT " e 

FOR i=l TO 4 

FOR j=i TO 4 

PRINT a ; B ; 

IF b(i,j)=16 THEN 

PRINT s K : 

ELSE 

IF bdJKlfc THEN 

p&twt B =■ 

ENOIF 

PRINT b(i p j); 
ENDIF 
NEXT i 



PRINT B B 

NEXT i 

it input sove 

valid=FALSE 

WHILE vaiid=FALSE DO 

ji=d 

WHILE ii=e DO 

RUN gfx2( s bell = ) 

INPUT "Move which piece ? \s 

IF ffi=* THEN 

RUN gix2£ B cwapea",ft i e f 8e i 24) 

PRINT CHR5C12) 

SHELL B taode pause" 

END 

ENDIF 

FOR i=i TO 4 

FOR ^ = "' TO i 



NEXT i 

IF il=e THEN 

PRINT 8 I can't find that nuaber" 

ENDIF 

ENDUHILE 

i2=e 

i2=e 

FOR i=iH TO il+I 
IF i>=l AND i<>4 THEN 
EXITIF b(ijl)=lb THEN 
i2=i 

j2=ii 

vaiid=TRUE 

ENDEXIT 

ENDIF 

NEXT i 

IF va!id=FALSE THEN 

FOR j=jH TO jl+1 

IF j>=i AND j<=4 THEN 

EXITIF b«il r j)=16 THEN 

i2=it 

•]2=j 

va!id=TRUE 

ENDEXIT 

ENDIF 

NEXT j 

ENDIF 

IF vaiid=FALSE THEN 

e9=ffi*+j 

PRINT "Not a valid aove" 

ENDIF 

ENDVHILE 

b(i2 f i2)=s 

bdl.jlMb 

IF t=] THEN 

c=e 

FOR i=! TO 4 

FOR j=l TO 4 

IF bCiJXc THEN it reprint board 

so luiion = FALSE 

ENDIF 

c=b(i,j) 

NEXT j 

NEXT i 

IF 5Glution=TRUE THEN 

PRINT "You got it!" 

ENDIF 

ENDIF 

IF t=2 THEN 

FOR i=I TO 4 

FOR j=l TO 4 

I" bii i ? / ^fii^',' ■ r; ' T^EN { -t r eD r i n t boa^d 

soiution=FALSE 

ENDIF 

NET : 
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PRINT "That is the correct solution!" 

END IF 

ENOIF 

UNTIL solution=TRVE 

INPUT "Like to play another gaae r ' \i% 

IF LEFT$(i$,l)= c n B THEN C? rerun gaae 

TietfQ3fte=FALSE 

ENDIF 

ENDVHILE 

RUN gfx2("cMrea" l » j e / 8e i 2*) 

SHELL E taode pause 1 

END 

PROCEDURE setupssb 

BASE 1 

PARA* bl'4, i)\ INTEGER 

PARAH il , j 1 : INTEGER 

DIM i f 5 : INTEGER 

FOR i=j TO 4 

FOR i=] TO 4 

bii ,j)=CH)*4+j 

NEXT j 

NEXT i 

i!=4 

yr-i 

PROCEDURE setupssb 

BASE 1 

PARAH 0(4,4), ast4,4):INTEGER 

PARAH 11 J 1: INTEGER 

DIM ij: INTEGER 

FOR i=I TO 4 

FOR j=i TO 4 

READ H(iJ) 

bii,i)-**ii t i) 

NEXT j 

NEXT i 

i!=4 

DATA r6 ; ]5 I S,12.n ; 2 / 5 J ?e i !3^ i 3 I 7 f iS i 9 J U 

OK, so here we go. First, I used the coaaand 
BASE 1. This is because all the arrays in the 
BASIC programme start at 1, and Basic@9 usually 
starts at zero (actually, SASIC does too, but I 
see no reason to waste valuable aeaory). Next, I 
dimensioned all the variables and arrays ; 
including a variable type which you say not have 
seer, before, the BOOLEAN type. This variable aay 
only contain either TRUE or FALSE' I used the 
SHELL coaaand tc turn off the 0S9 screen pause, 
so that the procjraaae won't sit there Halting at 
what it thinks is the end of a screen. That can 
oei a bit confusinci 






'eai ise ' s !• rial- 



way to prograaae. Sure, Basic89 will allow their 
use, but the code is such acre elegant without 
thea, if a little aore difficult to write. I set 
up a loop to allow the choice of whether to play 
another gaae which is done in line 'U56 in the 
BASIC version. I used a WHILE loop here so that 
all I need to do is sake a variable FALSE to 
exit the loop. 

Next, after clearing the screen (printing a 
forafeed character) , I print the opening aessage 
and ask the player for his choice of gaae. This 
follows through to line 160 of the BASIC 
prograaae. On the basis of the piayer's answer I 
RUN either the procedure 'setupssb 1 or 
'seiupasb 1 . You aay notice a slight variation 
here, I only tested for a M' to select 
sequential, and any other key would run the 
fiiagic square option. Tnen the next 38 lines do 
the saae as lines 489 to Iw in the BASIC 
prograaae. You will notice that the BASIC 
prograaae uses quite a large nuaber of GOTOs in 
this piece of code to break out of various parts 
of the code to continue the FQR-NEKT loop. I 
siaply set a variable (lop) to TRUE and again 
used a WHILE loop. All the other variables have 
the saae naaes, although you can of course use 
any naae, and are not Iiaited to two significant 
characters as in BASIC. 

To sake the screen easier to display, I used in 
this case a gfx2 coaaand 'cwarea'. This coaaand 
lisiis the area of the screen to be printed to, 
and aeans I don't need to use cursor 
aanoeuvering code at every print line. I siaply 
re-sized the screen to a 22 by 12 character box 
in approxiaately the eiddle of the (8$ by 24) 
screen. So next I print the scraabied array tc 
the screen with one space so that pieces aay be 
eoved around. The gaae is nlayed by entering the 
nuaber of the square which you want to aove into 
the space. The prograaae checks to see if the 
nuaber is one of the ones adjoining the space. A 
tone is sounded, and you are proapted for input. 
Pretty standard here, * though I could just have 
used ''PRINT CHRi(7)', but the gfx2 'bell' 
coaaand is nicer. If the player enters zero,, the 
prograaae resets the screen back to its 89 by 24 
size, and clears the screen and quits. 

The rest of the code is fairly straight forward. 
aGain the orioinai uses ssnv SQTOs to cuit rsu?. 
of FGR-NEXT loops (not a good oractice in ay 
'"somicTi even in E^AS*'"-- and I hav^ used boolean 
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Ur.s ■"■! *he farces t Dsrts ot ins conversion is 

i'A^Qi^Q traCi -: ' 0t *-*5 VdridDi-iS iild the V3ri'" : U5 

loops. SasicaS is a bit Linforgiving about 
'UNMATCHED CONTROL STRUCTURES' so you can't stop 
doino a conversion such as this in the siiddle 
without generating a series of error aessages 
when you quit the editor. One way around this is 
to use a text editor (like VED or SCRED or SLED) 
to create the source code first, and then to 
load it into BasictfS. The only thing you MUST do 
in this case is to aake the word 'PROCEDURE' in 
UPPERCASE the FIRST WGRD in the file. The letter 
P of procedure aust be the first character in 



OK eg -h^r- 3 u '' : ' ] have it ■ ^^ ; -c lov* 1 ir- "■a. 1 -' 
fros vou regard mo vour o*n trials anc 
tribulations with Basicy'3 prograaaes. even if 
you don't really want to start out on 
conversions of this type, but are having 
difficulties managing soiae aspect of Sasic'39. 
Please write to ae care of the newsletter 
editor, and let 'Professor Bob 1 help sharpen 
your prograsamg skills. 

Regards, 
Sob Qevries 



ooooooocooQQQQQQQQOQoooooooooo 

Chapter 2 - Setting started in C 
YOUR FIRST C PROGRAM 



CEO: The text for this tutorial aentions soae 
available on our Public Doaain disk nuaber 11] 



C prograaaes. These are not reproduced here, but are 



The best way to get started with C is to 
actually look at a prograa, so load the file 
naaed TRIVIAL.'- into your editor and display it 
on the aonitor. You are looking at the siapiest 
possible C prograa. There is no way to siapiify 
this prograa or to leave anything out. 
Unfortunately, the prograa doesn't do anything. 
The word "aain 3 is very iaportant, and Bust 
appear once, and only once in every C prograa. 
This is the point where execution is begun when 
the prograa is run. Ue will see later that this 
does not have to be the first stateaent in the 
prograa but it aust exist as the entry point. 

Following the 'main 3 prograa naae is a pair 
of parentheses which are an indication to the 
coapiier that this is a function. Ue will cover 
exactly what a function is in due tiae. For 
now, I suggest that you simply include the pair 
of parentheses. The two curly brackets, 
properly called braces, are used to define the 
liaits of the prograa itself. The actual 
prograa stateaents go between the two braces and 
in this case, there are no stateaents because 
the prograa does absolutely nothing. You can 
coapile and run this prograa, but since it has 
no executable stateaents, it does nothing. Keep 
in aind however, that it is a valid C prograa. 

A PROGRAM THAT DOES SOMETHING 

For a auch aore interesting prograa, load 
the prograa naaed 'iRTSOME.C and display it on 
your monitor. It is the saae as the previous 



prograa except that it has one executable 
stateaent between the braces. The executable 
stateaent is another function. Once again, we 
will not worry about what a function is, but 
only how to use this one. In order to output 
text to the aonitor, it is put within the 
function parentheses and bounded by quotation 
aarks. The end result is that whatever is 
included between the quotation aarks will be 
displayed on the aonitor when the prograa is 
run. Notice the seai-colon at the end of the 
line. C uses a sesi-coion as a stateaent 
terainator, so the serai-colon is required as a 
signal to the compiler that this line is 



This prograa is also executable, so 
:oaoile and run it to see if it does 



coaplete. 
you can 
what you think it should. 



ANOTHER PROGRAM WITH MORE OUTPUT 

Load the prograa yRTMORE.C and display it on 
your aonitor for an exaaple of aore output and 
another saail but iaportant concept. You will 
see that there are four prograa stateaents in 
this prograa, each one being a "printf 5 function 
stateaent. The top line will be executed first, 
then the next, and so on, until the fourth line 
is coaplete. The stateaents are executed in 
order froa top to bottca. Notice the funny 
character near the end of the first line, naaely 
the backslash. The backslash is used in the 
print f stateaent to indicate a special control 
character is followinq. In this case, the V 
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return/ 1 ins 'sed. ftrsv oiace witrun text thai 
vcl! desire ; you can put a ne^I ine character and 
start a new line. You could even out it in the 
middle of a word and split the word between two 
lines. The C coapiler considers the coabi nation 
of the backslash and letter n as one character. 



A complete description of this prograa is 
now possible. The first print? outputs a line 
of text and returns the carriage. The second 
print!" outputs a line but does not return the 
carriage so the third line is appended to that 
of the second, then followed by two carriage 
returns, resulting in a blank line. Finally the 
fourth printf outputs a line followed by a 
carriage return and the prograa is cosplete. 
Ccapile and run this prograa to see if it does 
what you expect it to do. It would be a good 
idea at this tise for you to experiment by 
adding additional lines of printout to see if 
you understand how the statesents really work. 

LETS PRINT SOME NUMBERS 

Load the file naaed ONEINT.C and display it 
on the sonitor for our first exaapie of how to 
work with data in a C prograa. The entry point 
"sain" should be clear to you by now as well as 
the beginning brace. The first new thing we 
encounter is the line containing "int index; 3 , 
which is used to define an integer variable 
naaed "index". The "int" is a reserved word in 
C, and can therefore not be used for anything 
eise. It defines a variable that can have a 
value froa -327S8 to 32767 on acst aicrocoaputer 
iapieaentaticns of C. Consult your users aanual 
for the exact definition for your coapiler. The 
variable naae. "index", can be any naae that 
follows the rules for an identifier and is not 
one of the reserved words for C. Consult your 
sanuai for an exact definition of an identifier 
for your coapiler. The final character on the 
line, the seai-colon. is the stateaent 
terainator used in C. 

we will see in a later chapter that 
additional integers could also be defined on the 
saiae line, but we will not complicate the 
present situation. Observing the aain body of 
the prograa. you will notice that there are 
three statesents that assign a value to the 
variable 'index 5 , but only one at a tiae. The 
first one assigns the value of 13 to "index", 



value Dr-ino ^nnt-ed out ~t ^noiiics De 
intuitively clear thai "index 3 is indeed a 
variable and can store aany different values. 
Please note that aany times the worcs "printed 
out" are used to aean "displayed on the 
acnitor". You will find that in aany cases 
experienced prograaaers take this liberty, 
probably due to the "printf" function being used 
for sonitor display. 

HOW OQ UE PRINT NUH3ERS 

To keep cur oroaise, let's return to the 
"printf statesents for a definition of how they 
work. Notice that they are ail identical and 
that they all begin just like the "printf 
statesents we have seen before. The first 
difference occurs when we coae to the I 
character. This is a special character that 
signals the output routine to stop copying 
characters to the output and do soaething 
different, naaely output a variable. The % sign 
is used to signal the start of aany different 
types of variables, but we will restrict 
ourselves to only one for this exaaple. The 
character following the t sign is a "d a , which 
signals the output routine to get a deciaal 
value and outout it. yhere the deciaal vaiue 
coaes froa will be covered shortly. After the 
a d". we find the faailiar \n. which is a signal 
to return the video "carriage", and the closing 
quotation aark. 

All of the characters between the quotation 
Barks define the pattern of data to be output by 
this statement, and after the pattern, there is 
a coasa followed by the variable naae "index". 
This is where the "printf" statement gets the 
deciaal vaiue shich it will output because of 
the "ISd" we saw earlier, ye could add aore "Id" 
output field descriptors within the brackets and 
aore variables following the description to 
cause aore data to be printed with one 
statement. Keep in Bind however, that it is 
iaportant that the nuaber of field descriptors 
and the nuaber of variable definitions aust be 
the saae or the runtiae systea will get confused 
and probably quit with a runtiae error. Much 
aore will be covered at a later tiae on ail 
aspects of input and output formatting. A 
reasonably good grasp of this topic is necessary 
in order to understand the following lessons. 
It is not necessary to understand everything 



about output 



this tiae, only a 
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fair understanding of the basics, 
run ONE INT. C and observe the output 



Compile arid 



HOW DO UE flOO COMMENTS IN C 

Load the file COMMENTS. C and observe it on 
your ffior.itor for an example of how comments can 
be added to a C program. Comments are added to 
sake a program sore readable to you but the 
cotpiier Bust ignore the cosaents. The slash 
star combination is used in C for comment 
delimiters. They are illustrated in the program 
at hand. Please note that the program does not 
illustrate good commenting practice, but is 
intended to illustrate where comments can go in 
a program. It is a very sloppy looking program. 
The first slash star combination introduces the 
first comment and the star slash at the end of 
the first line terminates this comment. Note 
that this comment is prior to the beginning of 
the program illustrating that a comment can 
precede the program itself. Good programming 
practice would include a comment prior to the 
program with a short introductory description of 
the program. The next comment is after the 
fi sain() B program entry point and prior to the 
opening brace for the program code itself. The 
third comment starts after the first executable 
statement and continues for four lines. This is 
perfectly legal because a comment can continue 
tor as many lines as desired until it is 
terminated. 

Note carefully that if anything were 
included in the blank spaces to the left of the 
three continuation lines of the comment, it 
would be part of the comment and would not be 
compiled. The last comment is located following 
the completion of the program, illustrating that 
comments can go nearly anywhere in a C program. 
Experiment with this program by adding comments 
in other places to see what will happen. 
Comment out one of the print! statements by 
putting comment delimiters both before and after 
it and see that it does not get printed out. 
Comments are very important in any programming 
language because you will soon forget what you 
did and why you did it. It will be much easier 
to modify or fix a well commented program a year 
from now than one with few or no comments. You 
will verv quickly develop vour own personal 



style at coBsentirig. oO£c c^^ilers alicw you 
tn "nest" cosm°nts shicn c^n d? verv fiandv ^-" 

you need to "comment out 5 s section of code 

during debugging. Check your compiler 

documentation for the availability of this 

feature with you particular compiler. Compile 
and run COMMENTS. C at this time. 

GOOD FORMATTING STYLE 

Load the file BQQDFQRM.C and observe it on 
your monitor. It is an example of a well 
formatted program. Even though it is very short 
and therefore does very little, it is very easy 
to see at a glance what it does. With the 
experience you have already gained in this 
tutorial, you should be able to very quickly 
grasp the meaning of the program in it's 
entirety. Your C compiler ignores ail extra 
soaces and all carriage returns giving you 
considerable freedom concerning hos you format 
your program. Indenting and adding soaces is 
entirely up to you and is a matter of oersonai 
taste. Compile and run the program to see if it 
does what you expect it to do. 

Now load and display the program USLYFGRM.C 
and observe it. How long will it take you to 
figure out what this program will do? It doesn't 
matter to the compiler which format style you 
use, but it will matter to you when you try to 
debug your program. Compile this program and 
run it. You may be surprised to find that it is 
the same program as the last one, except for the 
formatting. Don't get too worried about 
formatting style yet. You will have plenty of 
time to develop a style of your own as you learn 
the language. Be observant of styles as you see 
C programs in magazines, books, and other 
cub! i cations. This should pretty well cover the 
basic concepts of programing in C. but as tnere 
are marsy other things to learn, we will force 
anead to additional program structure. 

PROGRAMMING EXERCISES 

1 .Write a program to display your name on 
the monitor. 

2. Modify the orogram to display your address 
and phone number on separate lines by 
adding two additional "orintf* statements. 
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FREE - A bug-free version 

written by Mark Griffith et al 

Part 2 

[ED; This source code sample has cote to us via the BitNet aessage systes, from Mark Griffith J 

voi46 leax -!,x 
beq voUS 

exc d,y 

addci overflow^ 

exg d,y 

addd ,s 

bcc vol48 

ieay l,y 

bra voUG 

i SRI: clean up free clusters LSBs and old bytes in sector loop counter 
vgUS leas 3,s cleanup 
? vol 45 leas 2 ; s cleanup 

std nfree+2,u Free sectors, Iov order- 
sty ntree.u Free sectors, high order 



t Print volume status info i 

prnvol lbsr crlf 

leax esqtt.pcr Point to s voluae; 6 
bsr pasc and print it- 
Ida #$2« append a space 
bsr listen print that 
Ida f ifl Now a quote 
bsr listen print that 
leax volnase.u Point to disk nasie 
bsr pasg and print that 
end with a quote 
print that 
go to new line 
and another 
Point to c Total; E 
d r i n t it 

Point to Total Sectors 
Get the ASCII nueber 
leax ift5g],pcr Point to B sectors t" 
bsr pBssg print it 

Point to bytes total 
Bultipiy by 256 



Ida #'■ 

bsr listch 

bsr crlf 

Dsr crlf 

leax EisgS.pc! 

lbsr prasg 

leax totals 

bsr dbiprez 



eax total. u 



oa i , x 

std ,x 

Ida 3,x 

sta 2.x 

clr 3.x 

her At, "> n r- &• 



** c t the AS'"' ** number 



leax f[iso2.ocr Point to * bytes)" 



and print. 
Print = nesiine 
Point to " z tzz 
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ieax nfrsfi u Point- to sectors free 

bsr dbiprez Set the ASCII rtuaber 

ieax escijpcr Point to " sectors <■ 

H.^»i ^,™.^« mint •»* 

UjI JEJ|j jji i it i, IV 

ieax rfrse,u Point to bytes free 

Ida !,x Eultiply by 25b 

Ida 3,x 

sta 2,x 

clr 3,x 

bsr dDiprez Get the ASCII nusber 

ieax 6592,0:? Point to " bytes)* 

bsr pesg and print that too 

bsr crlf Do a couple neslines 

clrb No errors 

Ibra exit Finish up 

pag 

ntttttntitittntttnmttiim 

i 

i Subroutines 

t 

i Print strinas I 

pffisg pshs 2.X 

Pffisg2 Ida ; x+ 

beq pesqS 

bsr lislch 

tst -!,X 

bpl pesg2 

pasg5 puis a ; x,pc 

% Send character in reg A to output i 

listen pshs d,x,y 

tfr a,b 

bra sendcl 



crl ? 


pshs 


d\ X . V 




idb 


i*8d 




br= 


58P.dC I 


sendc 


nchc 


C;X.V 


senccl 


andb 


**7f 




pshs 


h 




*■ f r 


5,X 




idv 


ii 




ids 


II 




osS 


iisritln 




leas 


1 .5 


c - e ndcS 


puis 

r.jn 


y v p-.r 



fn: (X) -> n g^ 



p^ge < "1 
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hilb 


equ 


e 


Iolb 


equ 


2 


digval 


equ 


t 


dbl iter 


equ 


5 


dblzflg 


equ 


6 


dblzch 


eou 


7 


iraaes 


set 


dblzch+l 


dbiprez 


pshs 
c Ira 


d,x.y 




bra 


dbiee 


dblpre 


PSHS 


D,X t Y 




Ida 


#$26 


dbiee 


leas 


-f rases r s 




sta 


dblzch. S 




Idd 


hi 16, x 




std 


hiib.s 




Idd 


loifi.x 




std 


!clb,s 



db!36 



ids Idblitk t posers within table 

sta dbl iter . s loop iteration count 

ieax dbltbl ,pcr highest 18*n 

clr dblzflg, s 



dblie Ida f'6' 

sta digval ,s 



dbl2e 



Idd 


iolb.S 


low 16 of N 


subd 


ioie.x 


einus IG'i 


tfr 


*,y 




idd 


hilG,s 




sbcb 


hi 16+1 , X 




sbca 


hi 16,X 




bcs 


dbl3* 


subtract successful? 


sty 


iclb ; s 


yes, save hi 


std 


hil6,s 


and low 


inc 


digval, s 




bra 


dbl 20 




dec 


dbl iter . s 


iteration count 


heq 


dbiSI 


if last, sust send a dig 


Ida 


digval ,s 


update leading 6 suppres 


suba 


i'8 




ora 


dblzflg,* 




sta 


dblzflg ,5 




bne 


w w fc w t 




Ida 


dblzch, 5 


get leading G suppressor 


beq 


dbio2 


if none 


5t3 


diovsl s 


sDace 



cay; fh'' fifiintop 



pige \Z 
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pUi5 X 

db:32 ieax 4,x next 

»3l( UUilirtl . w SGtijfc uii ULfltC 

bne dbl!8 next power of ten 



do 186 



leas rraaes.s 

r,(Mc A v V ^ r 



dbltbl 

fob t389A.$CA88 one billion 

fdb se5F5 t $E!ee hundred lillion 

fdb *e«98,*9S8e ten million 

fdb $&e8F,*4240 one Billion 

fdb *8881 f $8bA8 hundred thousand 

fdb $9668 , $27 > 8 ten thousand 

fdb *&6&& f *83E8 one thousand 

fdb *6668,*66bi one hundred 

fdb $6668 ; $&88ft ten 

fdb $8668 ,$668 i one 

dbliifc equ ij-dblibl)/* 

t Static Strinqs * 



ffisgfc 


fcs 


"Voluae: B 


ffisgl 


fcs 


8 sectors ( 


sssg2 


TC5 


' bytes) fl 


E5g3 


fcs 


B Total: B 


ftSG* 


fcs 
eeod 


■ Free; s 


endeod 


equ 
end 


t 
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